home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / games2 / graalb.lha / 1.section < prev    next >
Text File  |  1996-04-30  |  5KB  |  80 lines
  1. /*
  2. /*                     Section file for Olaf Longhair
  3. /*
  4. /* =========================================================================
  5. /*
  6. /*                          Section 1 - Byzantium
  7. /*
  8. /* =========================================================================
  9. /*
  10.  
  11. CLPART: Olaf_Extras.iff
  12.  
  13. /* 1-2 playing flute
  14. SECTIONBOBS: 2;1;34;2;31;47;32;0
  15. /* 3 reading guide
  16. SECTIONBOBS: 2;3;2;50;31;47;32;0
  17. /* 5 reading dictionary
  18. SECTIONBOBS: 1;5;98;2;31;47;0;0
  19.  
  20.  
  21. SECTIONOBJ: 1;exotic\flute;0;0;0;0;0;0;0;0;0; ;-1;0;0;0;MID;WD;an;this;the
  22. SECTIONOBJ: 2;copper coin;0;0;0;99;0;0;0;0;0; ;-1;0;0;0;MID;TD;a;this;the
  23. SECTIONOBJ: 3;cup;1;-1;58;RBOB18;77;220;6;-110;11; ;-1;0;4;130;MID;CD;a;this;the
  24. SECTIONOBJ: 4;rubber band;0;0;0;0;0;0;0;0;0; ;-1;0;0;0;MID;WD;a;this;the
  25. SECTIONOBJ: 5;20 gold\pieces;0;0;0;0;0;0;0;0;0; ;-1;0;0;0;MID;WD; ;these;the
  26.  
  27.  
  28. /* Action 1 - Give
  29. /* ===============
  30. /*
  31. ACTION: 1;IFOBJ 14;IFOBJ2 15;SAY I'm pretty sure that\it is not a fishing boat;EXIT
  32. /*
  33. /* Action 3 - Use
  34. /* ==============
  35. /*
  36. ACTION: 3;IFOBJ SOBJ3;MOBJ;SAY I'm not sure I want\more of this stuff!;W 40;SAY It's really lethal, you know.;EXIT
  37. ACTION: 3;IFOBJ SOBJ2;SAY I don't see anything to spend\it on right here.;EXIT
  38. ACTION: 3;IFOBJ 21;IFNOTCARR;MOBJ;HANDLE;PICK;HANDLE -1
  39. ACTION: 3;IFOBJ 21;IFOBJ2 SOBJ1;IFOF 1=0;SAY I say - using the feather to\clean the flute worked splendidly!;OBJ1 SOBJ1;SETOF 1=1;EXIT
  40. ACTION: 3;IFOBJ 21;IFOBJ2 SOBJ1;IFOF 1=1;SAY It's already as clean as can be.;EXIT
  41. ACTION: 3;IFOBJ 24;IFOBJ2 SOBJ3;SAY What? You mean you want me to\stir the mead with the knife??\I'm shaken!;EXIT
  42. ACTION: 3;IFOBJ 24;IFOBJ2 SOBJ1;SAY It is not small enough\- I can't get the blade\into the opening.;EXIT
  43. ACTION: 3;IFOBJ 27;VERB 4;REDO
  44. ACTION: 3;IFOBJ 30;IFOBJ2 SOBJ1;CBOB SBOB5;W 50;SAY How convenient - the strange text on the\flute is explained in this book!;SAY Hmm...;SAY Apparently, the text on the flute reads:\"Play all notes twice to change the weather.";CBOB 11
  45. ACTION: 3;IFOBJ 30;IFOBJ2 SOBJ1;OBJ1 SOBJ1;SAY Well, it seems it's either\a genuine, magical flute...;SAY ...or tourist junk.;SETOF 2=1;EXIT
  46. ACTION: 3;IFOBJ SOBJ1;IFOF 1=0;OMOVE 0, , ,1, , ,A 0,(SBOB1,12)(SBOB2,24)(SBOB1,24)(SBOB2,12);W 150;CBOB 11;SAY I can't get a tone.\It seems something inside\is clogging the flute.;SAY Perhaps I'd better get\something to clean it out with.;EXIT
  47. ACTION: 3;IFOBJ SOBJ1;IFOF 1=1;IFOF 2=0;CUTSCENE 10,S;EXIT
  48. ACTION: 3;IFOBJ SOBJ1;IFOF 1=1;IFOF 2=1;IFOF 3=0;IFROOM 1;SAY I think I'd better be outside\beneath the open sky to try that.;EXIT
  49. ACTION: 3;IFOBJ SOBJ1;IFOF 1=1;IFOF 2=1;IFOF 3=0;CUTSCENE 11,F;SETRF 2,6=1;SETRF 3,6=1;SETRF 4,6=1
  50. /* Since conditions are not allowed in cutscene files, the weather change
  51. /* sequences for rooms 2 and 3 stay here: However, the CUTSCENE 11,F command
  52. /* above leaves the cutscene indicator on screen. It is removed again
  53. /* after CUTSCENE 12,S which follows after the fade commands below!
  54. ACTION: 3;IFOBJ SOBJ1;IFOF 1=1;IFOF 2=1;IFOF 3=0;IFROOM 2;FADE 23,30,$678,WAIT
  55. ACTION: 3;IFOBJ SOBJ1;IFOF 1=1;IFOF 2=1;IFOF 3=0;IFROOM 3;FADE 29,10,$678,STACK;FADE 31,10,$555,STACK;FADE 24,10,$555,STACK;FADE 25,10,$666,STACK;FADE 26,10,$666,STACK;FADE 27,10,$777,STACK;FADE 28,30,$777,WAIT
  56. ACTION: 3;IFOBJ SOBJ1;IFOF 1=1;IFOF 2=1;IFOF 3=0;CUTSCENE 12,S;SETOF 3=1;EXIT
  57. ACTION: 3;IFOBJ SOBJ1;IFOF 3=1;SAY I think it has served its purpose.\I am not that good a musician.;EXIT
  58. /*
  59. /* Action 4 - Open
  60. /* ===============
  61. /*
  62. ACTION: 4;IFOBJ 27;IFOF 1=0;SAY There's a book inside!;NAME guide book;GET 28,N;GET SOBJ4,U;SAY I'll keep the wrapping paper\and the strange, elastic string\that was around the parcel, too.;SETOF 1=1;EXIT
  63. ACTION: 4;IFOBJ 27;CBOB 11;OMOVE 0, , ,1, ,WAIT,A 0,(SBOB3,250)(SBOB4,50)
  64. ACTION: 4;IFOBJ 27;IFOF 2=0;THINK This book seems to contain a\lot of useful tips.;THINK Let's see...;THINK Ah, here:;SETOF 2=1
  65. ACTION: 4;IFOBJ 27;THINK "CONSTANTINOPLE. If you are stranded in\Constantinople, get out as quickly as\possible. It is a boring place."
  66. ACTION: 4;IFOBJ 27;THINK "Sea transportation in Constantinople is scarce\and generally unreliable. Your best bet\is to find a tough, reliable camel of some\sort, and then travel East towards Gurgan,\where better transportation may be found."
  67. ACTION: 4;IFOBJ 27;IFRF 2,4=0;SETRF 2,4=1
  68. ACTION: 4;IFOBJ 27;CBOB 11;EXIT
  69. /*
  70. /* Action 8 - Look at
  71. /* ==================
  72. /*
  73. ACTION: 8;IFOBJ SOBJ1;SAY There are some carvings that look like\text in a foreign language along the\side of the flute.;EXIT
  74. ACTION: 8;IFOBJ SOBJ2;SAY I can't buy much with this,\that's for sure.;EXIT
  75. ACTION: 8;IFOBJ SOBJ3;SAY It contains mead of an\appallingly bad quality!;EXIT
  76. ACTION: 8;IFOBJ SOBJ4;SAY It is a thin, elastic string\made of some material that\is unknown to me.;EXIT
  77. ACTION: 8;IFOBJ SOBJ5;SAY This should make it\possible to get out\of here in some\way or other!;EXIT
  78. /*
  79. /* END of section file
  80.